$PBExportHeader$cat_string.sru
$PBExportComments$Clase usada para pasar el string de un campo y el texto del titulo del campo a la ventana w_carga_observaciones.
forward
global type cat_string from nonvisualobject
end type
end forward

global type cat_string from nonvisualobject autoinstantiate
end type

type variables
// String que contiene el campo en la dw
String		string

// Longitud del String
Integer		longitud

// Titulo del Campo en la Datawindow
String		texto_titulo

// Codigo de Retorno de la Ventana
Integer		retorno
end variables

on cat_string.create
TriggerEvent( this, "constructor" )
end on

on cat_string.destroy
TriggerEvent( this, "destructor" )
end on

